//Rich HTML Balloon Tooltip: http://www.dynamicdrive.com/dynamicindex5/balloontooltip.htm
//Created: September 10th, 2006
//Updated: May 9th, 10 for window edge bug

var disappeardelay=250  //tooltip disappear delay (in miliseconds)
if (navigator.userAgent.indexOf("Firefox")!=-1){
    var verticaloffset=20 //vertical offset of tooltip from anchor link, if any
}else{
    var verticaloffset=160 //vertical offset of tooltip from anchor link, if any
}
var enablearrowhead=1 //0 or 1, to disable or enable the arrow image
var arrowheadimg=["images/arrowdown.png", "images/arrowup.png"] //path to down and up arrow images
var arrowheadheight=11 //height of arrow image (amount to reveal)

/////No further editting needed

var ie=document.all
var ns6=document.getElementById&&!document.all
verticaloffset=(enablearrowhead)? verticaloffset+arrowheadheight : verticaloffset

function getposOffset(what, offsettype){
    var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
    var parentEl=what.offsetParent;
    while (parentEl!=null){
        totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
        parentEl=parentEl.offsetParent;
    }
    return totaloffset;
}

function showhide(obj, e){
    dropmenuobj.style.left=dropmenuobj.style.top="-500px"
    if (e.type=="mouseover")
        obj.visibility="visible"
}

function iecompattest(){
    return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function clearbrowseredge(obj, whichedge){
    if (whichedge=="rightedge"){
        edgeoffsetx=0
        var windowedge=ie && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15
        dropmenuobj.contentmeasure=dropmenuobj.offsetWidth
        if (windowedge-dropmenuobj.x < dropmenuobj.contentmeasure)
            edgeoffsetx=dropmenuobj.contentmeasure-obj.offsetWidth
        if (dropmenuobj.x-edgeoffsetx+dropmenuobj.contentmeasure>windowedge)
            edgeoffsetx=dropmenuobj.x-windowedge+dropmenuobj.contentmeasure
        return edgeoffsetx
    }
    else{
        edgeoffsety=0
        var topedge=ie && !window.opera? iecompattest().scrollTop : window.pageYOffset
        var windowedge=ie && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18
        dropmenuobj.contentmeasure=dropmenuobj.offsetHeight
        if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure) //move up?
            edgeoffsety=dropmenuobj.contentmeasure+obj.offsetHeight+(verticaloffset*2)
        return edgeoffsety
    }
}

function displayballoontip(obj, e){ //main ballooon tooltip function
    if (window.event) event.cancelBubble=true
    else if (e.stopPropagation) e.stopPropagation()
    if (typeof dropmenuobj!="undefined") //hide previous tooltip?
        dropmenuobj.style.visibility="hidden"
    clearhidemenu()
    //obj.onmouseout=delayhidemenu
    dropmenuobj=document.getElementById(obj.getAttribute("rel"))
    showhide(dropmenuobj.style, e)
    dropmenuobj.x=getposOffset(obj, "left")
    dropmenuobj.y=getposOffset(obj, "top")+verticaloffset
    dropmenuobj.style.left=dropmenuobj.x-clearbrowseredge(obj, "rightedge")-5+"px"
    dropmenuobj.style.top=dropmenuobj.y-clearbrowseredge(obj, "bottomedge")+obj.offsetHeight+"px"
    if (enablearrowhead)
        displaytiparrow()
}

function displaytiparrow(){ //function to display optional arrow image associated with tooltip
    tiparrow=document.getElementById("arrowhead")
    tiparrow.src=(edgeoffsety!=0)? arrowheadimg[0] : arrowheadimg[1]
    var ieshadowwidth=(dropmenuobj.filters && dropmenuobj.filters[0])? dropmenuobj.filters[0].Strength-1 : 0
    //modify "left" value depending on whether there's no room on right edge of browser to display it, respectively
    tiparrow.style.left=(edgeoffsetx!=0)? parseInt(dropmenuobj.style.left)+dropmenuobj.offsetWidth-tiparrow.offsetWidth-10+"px" : parseInt(dropmenuobj.style.left)+40+"px"
    //modify "top" value depending on whether there's no room on right edge of browser to display it, respectively
    tiparrow.style.top=(edgeoffsety!=0)? parseInt(dropmenuobj.style.top)+dropmenuobj.offsetHeight-tiparrow.offsetHeight-ieshadowwidth+arrowheadheight+"px" : parseInt(dropmenuobj.style.top)-arrowheadheight+"px"
    tiparrow.style.visibility="visible"
}

function delayhidemenu(){
    delayhide=setTimeout("dropmenuobj.style.visibility='hidden'; dropmenuobj.style.left=0; if (enablearrowhead) tiparrow.style.visibility='hidden'",disappeardelay)
}

function clearhidemenu(){
    if (typeof delayhide!="undefined")
        clearTimeout(delayhide)
}

function reltoelement(linkobj){ //tests if a link has "rel" defined and it's the ID of an element on page
    var relvalue=linkobj.getAttribute("rel")
    return (relvalue!=null && relvalue!="" && document.getElementById(relvalue)!=null && document.getElementById(relvalue).className=="balloonstyle")? true : false
}

function initalizetooltip(){
    var all_links=document.getElementsByTagName("a")
    if (enablearrowhead){
        tiparrow=document.createElement("img")
        tiparrow.setAttribute("src", arrowheadimg[0])
        tiparrow.setAttribute("id", "arrowhead")
        document.body.appendChild(tiparrow)
    }
    for (var i=0; i<all_links.length; i++){
        if (reltoelement(all_links[i])){ //if link has "rel" defined and it's the ID of an element on page
            all_links[i].onmouseover=function(e){
                var evtobj=window.event? window.event : e
                displayballoontip(this, evtobj)
            }
            all_links[i].onmouseout=delayhidemenu
        }
    }
}

if (window.addEventListener)
    window.addEventListener("load", initalizetooltip, false)
else if (window.attachEvent)
    window.attachEvent("onload", initalizetooltip)
else if (document.getElementById)
    window.onload=initalizetooltip